x = rnorm( 100 ) y = rnorm( 100 ) df = data.frame( x, y ) p = ggplot( df, aes( x = x, y = y ) ) + geom_point() ggplotly( p )